18 REHXXXX$X8****XXX****XX*XX*##$XX###
28 REMX X
38 REMX GMFP2 DEMU PRUGRAH USER ll/2 X
48 REHX ---------------------------- X
58 RHHX 8RIGIN¤TORl BATRHUBER TBF X
68 RHHX HDDIFIED : UENZIN HANETSCH X
78 REHX DATE : 18.HAI.19B6/HK III
i-18 FQIEHX X
98 REMXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
188 Y1$¤"SMFPZ"
118 R¤1:8USUH 9888
128 Rx6:Y¤2:BGSuB988B :REH FH
138 R=71Y=3.5:G8SUH9888 QREH HAX.HGD.
148 Y1¤2!Y¤8:R¤28:GUSUB9888
158 Y1¤3:Y=8:R=28:GU5UB9888
168 Y1=4:Y=8:R=28:GUSUB9888
178 REH8XXXXXXXXXXXXXXXXXXXXXXXX
l38 REHX X
198 REN? B E N D E R X
288 REHX :6::;;;::;: X
218 REHR X
228 REHXXX*******$XX#XXXXXX*XXXX
238:
248 GUSUH 3328
258 PRINT "E"
268 PRINT:PRINT:PRINT
278 PRINT“GERAETEDATEN"
zaa r>r<1uT·· —--——--—-——--------------------- 4 ------ ··-
298 PRINT:PRINT:PRINT:PRINT
388 INPUT"BETRIEB5SPANNUNG IN VOLT =";B
318 Y3=2IY1=(B·8.1)IY2¤<B+8.1)LR¤35:GD5UE 9888
328 PRINT
338 H=35IGU$UB 9888
348 IF Y<Yi THEN 318
358 IF T>Y2 THEN 318
368 PRINT"BETRIE8SSPANNUNG M “TAE(25> Y "UDLT“
378 PRINT
388 INPUT"ANZAHL HANAELE "JKQ
398 IF 8SD(K$)> 47 THEN 488
488 IF ASD(K$)< 58 THEN 438
418 PDKE 198,8ZPDKE 197,138:PUKE 196,568 AND 255
428 GUTG 388
438 H=ASD(H$J-43IIF K{1 THEN GBTD 388
448 Y1=2:Y=1:R=28:GUSUB9BB8
458 FUR L=1 TU K STEP 1
468 PRINT"E"
478 PRINT:PRINT:PRINT
458 PRINT"5ENDERTE5T“
498 PRINT"-- --—--—-·— ·—·*· ···· ·· ···· ·· ·········· ”
588 PRIMT:PRIMT:PRINT:PRINT
518 PRINT
528 PRINT
538 INPUT"EIN5TELLEN HAHAL "jK$(L)
548 IF A5C(K${L>)> 47 THEN 558
558 IF ABC(K$(L>)< 5B THEN sas
*568 PURE 198.8:PUKE 197.129 {POKE 196.488 RND 255
578 GUTD 538
538 PRINT: K(L)=§SC(H$(Ll>-48
598 PRINT
688 R=41IGD5UB9888:IF Y>8.1THEN BDT8 648
618 R¤48IGDSUB 9888
628 Y$="$ENDER HDCHTASTEN "
638 R¤E7:GG5UB9888
648 R=54:YE=2:G8SU898B8
658 IFTf.4THEN6B8